﻿Public Class Form1

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Close()

    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        If (TextBox1.Text = "1") Then

            MessageBox.Show("Aceite")

        End If
        If (TextBox1.Text = "2") Then

            MessageBox.Show("Aceitunas")

        End If
        If (TextBox1.Text = "3") Then

            MessageBox.Show("Huevos")

        End If
        If (TextBox1.Text = "4") Then

            MessageBox.Show("Servilletas")

        End If
        If (TextBox1.Text = "5") Then

            MessageBox.Show("Shampoo")

        End If
        If (TextBox1.Text = "6") Then

            MessageBox.Show("Pan")

        End If
        If (TextBox1.Text = "7") Then

            MessageBox.Show("Helado")

        End If
        If (TextBox1.Text = "8") Then

            MessageBox.Show("Chocolate")

        End If
        If (TextBox1.Text = "9") Then

            MessageBox.Show("Galletas")

        End If
        If (TextBox1.Text = "10") Then

            MessageBox.Show("Leche")

        End If
    End Sub
End Class
